home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / dskut / patch12.zip / TCPATCH.DIF < prev    next >
Text File  |  1990-05-31  |  16KB  |  566 lines
  1. *** ../patch/common.h    Thu May 24 14:21:46 1990
  2. --- common.h    Thu May 31 10:28:21 1990
  3. ***************
  4. *** 1,6 ****
  5. ! /* $Header: common.h,v 2.0.1.2 88/06/22 20:44:53 lwall Locked $
  6.    *
  7.    * $Log:    common.h,v $
  8.    * Revision 2.0.1.2  88/06/22  20:44:53  lwall
  9.    * patch12: sprintf was declared wrong
  10.    * 
  11. --- 1,9 ----
  12. ! /* $Header: common.h,v 2.0.1.3 90/05/30 11:30:00 mward $
  13.    *
  14.    * $Log:    common.h,v $
  15. +  * Revision 2.0.1.3  90/05/30  11:30:00  mward
  16. +  * added TURBOC stuff
  17. +  * 
  18.    * Revision 2.0.1.2  88/06/22  20:44:53  lwall
  19.    * patch12: sprintf was declared wrong
  20.    * 
  21. ***************
  22. *** 40,51 ****
  23. --- 43,68 ----
  24.   #include <ctype.h>
  25.   #include <signal.h>
  26.   
  27. + #ifdef TURBOC20
  28. + #include <stdlib.h>
  29. + #include <string.h>
  30. + #include <io.h>
  31. + #include <fcntl.h>
  32. + #endif
  33. + 
  34.   /* constants */
  35.   
  36.   #define TRUE (1)
  37.   #define FALSE (0)
  38.   
  39. + #ifdef TURBOC20
  40. + #define MAXPATH 80                /* max path spec size */
  41. + #define MAXMEMBLK 65534L            /* biggest block of mem */
  42. + #define MAXHUNKSIZE (MAXMEMBLK/sizeof(char *))    /* is this enough lines? */
  43. + #else
  44.   #define MAXHUNKSIZE 100000        /* is this enough lines? */
  45. + #endif
  46. + 
  47.   #define INITHUNKMAX 125            /* initial dynamic allocation size */
  48.   #define MAXLINELEN 1024
  49.   #define BUFFERSIZE 1024
  50. ***************
  51. *** 145,150 ****
  52. --- 162,168 ----
  53.   
  54.   EXT char *revision INIT(Nullch);    /* prerequisite revision, if any */
  55.   
  56. + #ifndef TURBOC20
  57.   char *malloc();
  58.   char *realloc();
  59.   char *strcpy();
  60. ***************
  61. *** 156,159 ****
  62. --- 174,178 ----
  63.   char *sprintf();
  64.   #else
  65.   int sprintf();
  66. + #endif
  67.   #endif
  68. *** ../patch/config.h    Thu May 24 14:21:52 1990
  69. --- config.h    Thu May 31 10:36:24 1990
  70. ***************
  71. *** 1,25 ****
  72.   /* config.h
  73. !  * This file was produced by running the Configure script.
  74.    * Feel free to modify any of this as the need arises.
  75.    */
  76.   
  77.   
  78. ! #/*undef    EUNICE        /* no file linking? */
  79. ! #/*undef    VMS
  80.   
  81. ! #/*undef    index strchr    /* cultural */
  82. ! #/*undef    rindex strrchr    /*  differences? */
  83.   
  84. - #/*undef    void int    /* is void to be avoided? */
  85. - 
  86.   /* How many register declarations are paid attention to? */
  87.   
  88.   #define Reg1 register
  89.   #define Reg2 register
  90.   #define Reg3 register
  91. ! #define Reg4 register
  92. ! #define Reg5 register
  93. ! #define Reg6 register
  94.   #define Reg7 
  95.   #define Reg8 
  96.   #define Reg9 
  97. --- 1,36 ----
  98. + /* $Header: cofig.h,v 2.0.1 90/05/30 11:30:00 mward $
  99. +  *
  100. +  * $Log:    config.h,v $
  101. +  * Revision 2.0.1  90/05/30  11:30:00  mward
  102. +  * set up for MSDOS TURBOC v2.0
  103. +  */
  104. +  
  105.   /* config.h
  106. !  * This file was produced by hand for MSDOS TURBOC V2.0.
  107.    * Feel free to modify any of this as the need arises.
  108.    */
  109.   
  110.   
  111. ! #undef    EUNICE        /* no file linking? */
  112. ! #undef    VMS
  113. ! #undef    CHARSPRINTF     /* sprintf does NOT return pointer to char */
  114. ! #undef    FLEXFILENAMES    /* file names must be 14 chars or less */
  115.   
  116. ! #ifdef TURBOC20
  117. ! #define    index strchr    /* cultural */
  118. ! #define    rindex strrchr    /*  differences? */
  119. ! #define    VOIDSIG     /* signal returns ptr to function returning void*/
  120. ! #define    VOIDFLAGS 7    /* full void support */
  121. ! #endif
  122.   
  123.   /* How many register declarations are paid attention to? */
  124.   
  125.   #define Reg1 register
  126.   #define Reg2 register
  127.   #define Reg3 register
  128. ! #define Reg4
  129. ! #define Reg5
  130. ! #define Reg6
  131.   #define Reg7 
  132.   #define Reg8 
  133.   #define Reg9 
  134. *** ../patch/inp.c    Thu May 24 14:21:46 1990
  135. --- inp.c    Thu May 31 10:37:49 1990
  136. ***************
  137. *** 1,6 ****
  138. ! /* $Header: inp.c,v 2.0.1.1 88/06/03 15:06:13 lwall Locked $
  139.    *
  140.    * $Log:    inp.c,v $
  141.    * Revision 2.0.1.1  88/06/03  15:06:13  lwall
  142.    * patch10: made a little smarter about sccs files
  143.    * 
  144. --- 1,12 ----
  145. ! /* $Header: inp.c,v 2.0.1.2 90/05/30 11:30:00 mward $
  146.    *
  147.    * $Log:    inp.c,v $
  148. +  * Revision 2.0.1.2  90/05/30  11:30:00 mward
  149. +  * if TURBOC20 have plan_a check against MAXMEMBLK before mallocs
  150. +  * if TURBOC20 have plan_b use binary mode io for tmp file
  151. +  * modified plan_a to allow for translation shrinkage on text reads
  152. +  * modify calls to read, write to detect error on return value of -1
  153. +  * 
  154.    * Revision 2.0.1.1  88/06/03  15:06:13  lwall
  155.    * patch10: made a little smarter about sccs files
  156.    * 
  157. ***************
  158. *** 120,128 ****
  159.       out_of_mem = FALSE;
  160.       return FALSE;            /* force plan b because plan a bombed */
  161.       }
  162. - #ifdef lint
  163.       i_womp = Nullch;
  164. ! #else
  165.       i_womp = malloc((MEM)(i_size+2));    /* lint says this may alloc less than */
  166.                       /* i_size, but that's okay, I think. */
  167.   #endif
  168. --- 126,136 ----
  169.       out_of_mem = FALSE;
  170.       return FALSE;            /* force plan b because plan a bombed */
  171.       }
  172.       i_womp = Nullch;
  173. ! #ifndef lint
  174. ! #ifdef TURBOC20
  175. !     if (i_size < MAXMEMBLK)
  176. ! #endif
  177.       i_womp = malloc((MEM)(i_size+2));    /* lint says this may alloc less than */
  178.                       /* i_size, but that's okay, I think. */
  179.   #endif
  180. ***************
  181. *** 131,137 ****
  182.       if ((ifd = open(filename, 0)) < 0)
  183.       fatal2("Can't open file %s\n", filename);
  184.   #ifndef lint
  185. !     if (read(ifd, i_womp, (int)i_size) != i_size) {
  186.       Close(ifd);    /* probably means i_size > 15 or 16 bits worth */
  187.       free(i_womp);    /* at this point it doesn't matter if i_womp was */
  188.       return FALSE;    /*   undersized. */
  189. --- 139,145 ----
  190.       if ((ifd = open(filename, 0)) < 0)
  191.       fatal2("Can't open file %s\n", filename);
  192.   #ifndef lint
  193. !     if ((i_size=(unsigned)read(ifd, i_womp, (int)i_size)) == (unsigned)-1) {
  194.       Close(ifd);    /* probably means i_size > 15 or 16 bits worth */
  195.       free(i_womp);    /* at this point it doesn't matter if i_womp was */
  196.       return FALSE;    /*   undersized. */
  197. ***************
  198. *** 149,157 ****
  199.       if (*s == '\n')
  200.           iline++;
  201.       }
  202. - #ifdef lint
  203.       i_ptr = Null(char**);
  204. ! #else
  205.       i_ptr = (char **)malloc((MEM)((iline + 2) * sizeof(char *)));
  206.   #endif
  207.       if (i_ptr == Null(char **)) {    /* shucks, it was a near thing */
  208. --- 157,167 ----
  209.       if (*s == '\n')
  210.           iline++;
  211.       }
  212.       i_ptr = Null(char**);
  213. ! #ifndef lint
  214. ! #ifdef TURBOC20
  215. !     if (iline+2<MAXMEMBLK/sizeof(char *))
  216. ! #endif
  217.       i_ptr = (char **)malloc((MEM)((iline + 2) * sizeof(char *)));
  218.   #endif
  219.       if (i_ptr == Null(char **)) {    /* shucks, it was a near thing */
  220. ***************
  221. *** 210,215 ****
  222. --- 220,228 ----
  223.       fatal2("Can't open file %s\n", filename);
  224.       if ((tifd = creat(TMPINNAME, 0666)) < 0)
  225.       fatal2("Can't open file %s\n", TMPINNAME);
  226. + #ifdef TURBOC20
  227. +     setmode(tifd, O_BINARY);
  228. + #endif
  229.       while (fgets(buf, sizeof buf, ifp) != Nullch) {
  230.       if (revision != Nullch && !found_revision && rev_in_string(buf))
  231.           found_revision = TRUE;
  232. ***************
  233. *** 245,257 ****
  234.       fatal1("Can't seem to get enough memory.\n");
  235.       for (i=1; ; i++) {
  236.       if (! (i % lines_per_buf))    /* new block */
  237. !         if (write(tifd, tibuf[0], BUFFERSIZE) < BUFFERSIZE)
  238.           fatal1("patch: can't write temp file.\n");
  239.       if (fgets(tibuf[0] + maxlen * (i%lines_per_buf), maxlen + 1, ifp)
  240.         == Nullch) {
  241.           input_lines = i - 1;
  242.           if (i % lines_per_buf)
  243. !         if (write(tifd, tibuf[0], BUFFERSIZE) < BUFFERSIZE)
  244.               fatal1("patch: can't write temp file.\n");
  245.           break;
  246.       }
  247. --- 258,270 ----
  248.       fatal1("Can't seem to get enough memory.\n");
  249.       for (i=1; ; i++) {
  250.       if (! (i % lines_per_buf))    /* new block */
  251. !         if (write(tifd, tibuf[0], BUFFERSIZE) == -1)
  252.           fatal1("patch: can't write temp file.\n");
  253.       if (fgets(tibuf[0] + maxlen * (i%lines_per_buf), maxlen + 1, ifp)
  254.         == Nullch) {
  255.           input_lines = i - 1;
  256.           if (i % lines_per_buf)
  257. !         if (write(tifd, tibuf[0], BUFFERSIZE) == -1)
  258.               fatal1("patch: can't write temp file.\n");
  259.           break;
  260.       }
  261. ***************
  262. *** 258,264 ****
  263. --- 271,281 ----
  264.       }
  265.       Fclose(ifp);
  266.       Close(tifd);
  267. + #ifdef TURBOC20
  268. +     if ((tifd = open(TMPINNAME, O_BINARY)) < 0) {
  269. + #else
  270.       if ((tifd = open(TMPINNAME, 0)) < 0) {
  271. + #endif
  272.       fatal2("Can't reopen file %s\n", TMPINNAME);
  273.       }
  274.   }
  275. ***************
  276. *** 287,293 ****
  277.   #ifndef lint        /* complains of long accuracy */
  278.           Lseek(tifd, (long)baseline / lines_per_buf * BUFFERSIZE,